10 CLR:RESTORE:POKE29,0:GOTO2055 20 A$=" DO YOU WANT A PRINTOUT OF THE INSTRUCTIONS" 25 TL=1:GOSUB1725:PRINT"[157] " 30 GETR$:IFR$=""THEN30 35 IFR$<>"Y"THENRETURN 40 OPEN4,4,7:CMD4 45 PRINT CHR$(14) TAB(15)"[215][193][210] [199][193][205][197][211]" 50 FORS=1TO8:PRINT:NEXT 55 PRINTCHR$(14)" [193][212][212][193][195][203] [204][207][195][193][212][201][207][206][211]" 60 PRINTCHR$(10):PRINTCHR$(10) 65 PRINTCHR$(14)" [213].[211]. [195]ITIES [213].[211].[211].[210]. [195]ITIES ":PRINT 70 PRINTCHR$(15) 75 PRINT" [206]EW [217]ORK [215]ASHINGTON ";TAB(17);" [205]OSCOW"; 80 PRINT" [204]ENINGRAD" 85 PRINT" [195]HICAGO [204]OS [193]NGELES";TAB(16);" [207]MSK";TAB(9);"[195]HELYABINSKI" 90 PRINT" [206]ORAD [203]ANSAS [195]ITY";TAB(18);"[196]ONETSK";TAB(6);"[203]IEV" 95 PRINT" [196]ALLAS [208]HILADELPHIA";TAB(17);"[205]INSK";TAB(8); 100 PRINT"[195]ENTRAL [210]USSIA" 105 PRINT" [211]EATTLE [206]ORTH [196]AKOTA";TAB(17);"[211]ARATOV";TAB(6);"[212]ASHKENT" 110 PRINT" [196]ENVER [193]LBUQUERQUE";TAB(18);"[193]LMA-[193]TA";TAB(5);"[203]HAR'KOV" 115 PRINT" [211]T. [204]OUIS";TAB(31);"[199]ORKY":PRINTCHR$(10):PRINTCHR$(10) 120 PRINT" [213]SE JOYSTICK BACK THEN FOREWARD"; 125 PRINT" TO ENABLE MISSLES WHEN PROMPTED.":PRINT 130 PRINT" [213]SE THE RESTORE KEY ANY TIME TO ESCAPE FROM A GAME IN PROGRESS." 135 PRINT" [196]O NOT, HOWEVER, USE RESTORE [196][213][210][201][206][199] SPEECH." 140 PRINTCHR$(12):PRINT#4:CLOSE4:RETURN 145 POKE53281,0:POKE53280,0:CLR:RESTORE 150 PRINT"[147]" 155 TL=0:SP=10:GOSUB1720 160 PRINT"[157] ":TL=1:SP=10:GOSUB1720 165 PRINT"[157] ":TL=2:SP=10:GOSUB1720 170 GOSUB2130 175 IFP4$="JOSHUA"THENPRINT"[157] ":GOTO260 180 IFP4$="HELP GAMES"THEN220 185 IFP4$="GAMES 1"THEN495 190 IFP4$="HELP"ORP4$="HELP LOGON"THEN205 195 A$="PASSWORD NOT RECOGNIZED BY SYSTEM":PRINT"[157] ":TL=3:GOSUB1725 200 A$="CONNECTION IS TERMINATED":PRINT"[157] ":TL=4:GOSUB1725:PRINT"[157] ":GOTO145 205 PRINT"[157] ":A$="---HELP NOT AVAILABLE---":TL=TL+2:GOSUB1725:PRINT"[157] " 210 RESTORE:FORU=1TO2:READA$:NEXTU:TL=2:FORAQ=1TO1000:NEXTAQ 215 PRINT"[147]":GOSUB1720:GOTO170 220 A$="FALKENS MAZE":PRINT"[147]":PRINT"[157] ":TL=1:GOSUB1725:PRINT"[157] " 225 A$="CHECKERS":PRINT"[157] ":TL=2:GOSUB1725:PRINT"[157] " 230 A$="CHESS":PRINT"[157] ":TL=3:GOSUB1725:PRINT"[157] " 235 A$="POKER":PRINT"[157] ":TL=4:GOSUB1725:PRINT"[157] " 240 A$="GUERRILLA WARFARE":PRINT"[157] ":TL=5:GOSUB1725:PRINT"[157] " 245 A$="CHEMICAL AND BIOTOXIC WARFARE":PRINT"[157] ":TL=6:GOSUB1725:PRINT"[157] " 250 A$="GLOBAL THERMONUCLEAR WAR":PRINT"[157] ":TL=10:GOSUB1725:PRINT"[157] " 255 GOTO210 260 PRINT"[147]":A$="GREETINGS PROFESSOR FALKEN":TL=0:GOSUB1725:PRINT"[157] " 265 PRINT:PRINT"  [146]"; 270 GOSUB2130 275 PRINT:TL=5:A$="HOW ARE YOU TODAY?":GOSUB1725:PRINT"[157] ";:PRINT 280 PRINT:PRINT" ";" [146]"; 285 GOSUB2130 290 PRINT:TL=9:A$="SHALL WE PLAY A GAME":GOSUB1725:PRINT"[157] ";:PRINT 295 PRINT:PRINT" ";" [146]";:P4$="" 300 GOSUB2130 305 IFLEFT$(P4$,1)="Y"ORP4$="OK"THENPOKE29,0:GOTO350 310 POKE29,0 315 IFP4$="LOVE TO"ORP4$="I'D LOVE TO"THEN350 320 IFP4$="LOVE TO."ORP4$="I'D LOVE TO."THEN350 325 IFLEFT$(P4$,1)="N"THENPOKE29,0:GOTO345 330 POKE29,0 335 PRINT:TL=13:A$="INVALID REQUEST.SYSTEM RESET":GOSUB1725:PRINT"[157] ";:PRINT 340 FORQW=1TO2000:NEXT:GOTO145 345 A$="GOOD BY FOR NOW PROFESSOR":TL=13:GOSUB1725:PRINT"[157] ";:GOTO1715 350 POKE792,207:POKE793,2:POKE720,7:POKE739,52:POKE743,169:POKE744,48 355 POKE749,50:POKE754,13:POKE758,0:POKE53280,0:POKE53281,0:PRINT"" 360 A$="FALKENS MAZE":PRINT"[147]":PRINT"[157] ":TL=1:GOSUB1725:PRINT"[157] " 365 A$="CHECKERS":PRINT"[157] ":TL=2:GOSUB1725:PRINT"[157] " 370 A$="CHESS":PRINT"[157] ":TL=3:GOSUB1725:PRINT"[157] " 375 A$="POKER":PRINT"[157] ":TL=4:GOSUB1725:PRINT"[157] " 380 A$="GUERILLA WARFARE":PRINT"[157] ":TL=5:GOSUB1725:PRINT"[157] " 385 A$="CHEMICAL AND BIOTOXIC WARFARE":PRINT"[157] ":TL=6:GOSUB1725:PRINT"[157] " 390 A$="GLOBAL THERMONUCLEAR WAR":PRINT"[157] ":TL=10:GOSUB1725:PRINT"[157] " 395 A$="CHOOSE ONE":PRINT"[157] ":TL=12:GOSUB1725:PRINT"[157] " 400 PRINT:PRINT:TL=14:PRINT"  [146]";:GOTO405 402 GOTO350 405 P3$=" " 410 GOSUB2130 415 IFLEFT$(P4$,4)="GLOB"THENPOKE29,0:GOTO460 420 POKE29,0:IFP4$="FALKENS MAZE"THEN2090 425 IFP4$="CHECKERS"THEN2095 430 IFP4$="CHESS"THEN2100 435 IFP4$="POKER"THEN2105 440 IFLEFT$(P4$,4)="CHEM"THENPOKE29,0:GOTO2110 445 IFP4$="GUERILLA WARFARE"THEN2115 450 POKE29,0 455 A$="GAME NOT AVAILABLE":TL=16:GOSUB1725:PRINT"[157] ":GOTO350 460 A$="WOULDN'T YOU PREFER A GOOD GAME OF":TL=16:GOSUB1725:PRINT"[157] " 465 A$="CHESS":TL=16:GOSUB1725:PRINT"[157] ":P4$="":PRINT:PRINT" ";" [146]"; 470 GOSUB2130 475 IFLEFT$(P4$,1)="Y"ORP4$="OK"THENP4$="CHESS":POKE29,0:GOTO430 480 POKE29,0 485 A$="FINE":TL=18:GOSUB1725 490 PRINT"[157] "; 495 GOSUB2005 500 POKE53281,0:POKE53280,0:PRINT"[154]" 505 IFSD=1ORSD=3THENPRINT"[147]ENTER ATTACK LOCATION";:SAY"ENTER ATTACK LOCATION.":INPUTAT$ 510 PRINT"[147]" 515 PRINT" 520 [153]" (null)TAB(TAB((null) 525 PRINT" [186][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][205] [206] [206]" 530 PRINT" [165] [205] [206] [206]" 535 PRINT" [165] [205][164][164][206] [206]" 540 PRINT" [165] [172] [172][206]" 545 PRINT" [165] . . [165]" 550 PRINT" [165] NORAD [206]" 555 PRINT" [205] [218] [165]" 560 PRINT" [205] [165]" 565 PRINT" [205][187] [206] " 570 PRINT" [205][164][164][164][164][164][164][164][164] [206] " 575 PRINT" [205] [206] " 580 PRINT" [205] [206][183][183][183][183][205] [167] " 585 PRINT" [205][206] [167] [167] " 590 PRINT" [205][206] 595 [139]SD[179][177]1[175]SD[179][177]3[167]1120 600 [139]AT$[178]"CHICAGO"[167]680 605 [139]AT$[178]"LOS ANGELES"[167]750 610 [139]AT$[178]"NEW YORK"[167]765 615 [139]AT$[178]"KANSAS CITY"[167]780 620 [139]AT$[178]"ST.LOUIS"[176]AT$[178]"ST. LOUIS"[167]795 625 [139]AT$[178]"SAINT LOUIS"[167]795 630 [139]AT$[178]"PHILADELPHIA"[167]810 635 [139]AT$[178]"NORTH DAKOTA"[167]825 640 [139]AT$[178]"ALBUQUERQUE"[167]840 645 [139]AT$[178]"DENVER"[167]915 650 [139]AT$[178]"WASHINGTON D.C."[176]AT$[178]"WASHINGTON,D.C."[167]855 655 [139]AT$[178]"WASHINGTON"[167]855 660 [139]AT$[178]"DALLAS"[167]870 665 [139]AT$[178]"SEATTLE"[167]885 670 [139]AT$[178]"NORAD"[167]900 675 [137]505 680 [153]"ATTACK LOCATION CHICAGO":SAY"ATTACK LOCATION CHICOGO." 685 CH[178]CH[170]1:[139]CH[179][177]1[167]505 690 DE[178]2.9:NK[178]0:Z[178]24:K[178]5 695 [153]"":[129]T[178]1[164]K:[153][163]Z);"SYSPEEK":[129]N[178]1[164]500:[130]N:[130]T 700 [153][163]Z);"SYS*":[129]T[178]1[164]300:[130] 705 Z[178]Z[171]3:[153][163]Z);"ONONONSYS(null) (null) (null) (null) 710 Z=Z+1:PRINTTAB(Z);"[158][213][195][195][195][201]": 715 PRINTTAB(Z);"[158][199] * [200]" 720 PRINTTAB(Z);"[158][202][195][195][195][203] 725 Z[178]Z[171]1:[153][163]Z);"SYS(null) (null) (null) (null)" 730 [153]"" 735 [129]TR[178]1[164]500:[130] 740 [139]SU[178]1[167]1510 745 [137]930 750 [153]"ATTACK LOCATION LOS ANGELES":SAY"ATTACK LOCATION LOS ANGELEES." 755 LA[178]LA[170]1:[139]LA[179][177]1[167]505 760 DE[178]2:NK[178]25:Z[178]6:K[178]10:[137]695 765 [153]"ATTACK LOCATION NEW YORK":SAY"ATTACK LOCATION NEW YORK." 770 NY[178]NY[170]1:[139]NY[179][177]1[167]505 775 DE[178]6.7:NK[178]0:Z[178]31:K[178]5:[137]695 780 [153]"ATTACK LOCATION KANSAS CITY":SAY"ATTACK LOCATION KANSAS CITY." 785 KC[178]KC[170]1:[139]KC[179][177]1[167]505 790 DE[178].4:NK[178]54:Z[178]20:K[178]6:[137]695 795 [153]"ATTACK LOCATION ST. LOUIS":SAY"ATTACK LOCATION SAINT LUIS." 800 SL[178]SL[170]1:[139]SL[179][177]1[167]505 805 DE[178].4:NK[178]18:Z[178]22:K[178]6:[137]695 810 [153]"ATTACK LOCATION PHILADELPHIA":SAY"ATTACK LOCATION PHILAD ELPHIA." 815 PH[178]PH[170]1:[139]PH[179][177]1[167]505 820 DE[178]1.7:NK[178]0:K[178]6:Z[178]29:[137]695 825 [153]"ATTACK LOCATION NORTH DAKOTA":SAY"ATTACK LOCATION NORTH DAKOATTA." 830 ND[178]ND[170]1:[139]ND[179][177]1[167]505 835 DE[178].4:NK[178]68:Z[178]18:K[178]3:[137]695 840 [153]"ATTACK LOCATION ALBUQUERQUE":SAY"ATTACK LOCATION ALBUHKERKEY." 845 AB[178]AB[170]1:[139]AB[179][177]1[167]505 850 DE[178].3:NK[178]61:Z[178]12:K[178]10:[137]695 855 [153]"ATTACK LOCATION WASHINGTON":SAY"ATTACK LOCATION WASHINGTON." 860 WS[178]WS[170]1:[139]WS[179][177]1[167]505 865 DE[178].9:NK[178]0:Z[178]29:K[178]7:[137]695 870 [153]"ATTACK LOCATION DALLAS":SAY"ATTACK LOCATION DAALAS." 875 DL[178]DL[170]1:[139]DL[179][177]1[167]505 880 DE[178].9:NK[178]21:K[178]11:Z[178]18:[137]695 885 [153]"ATTACK LOCATION SEATTLE":SAY"ATTACK LOCATION SEAATTLE." 890 S(1)[178]S(1)[170]1:[139]S(1)[179][177]1[167]505 895 DE[178].5:NK[178]4:K[178]3:Z[178]4:[137]695 900 [153]"ATTACK LOCATION NORAD":SAY"ATTACK LOCATION NORAD." 905 NR[178]NR[170]1:[139]NR[179][177]1[167]505 910 DE[178].1:NK[178]24:Z[178]11:K[178]8:[137]695 915 [153]"ATTACK LOCATION DENVER":SAY"ATTACK LOCATION DENVER." 920 DN[178]DN[170]1:[139]DN[179][177]1[167]505 925 DE[178].5:NK[178]45:Z[178]12:K[178]6:[137]695 930 [139]SD[178]0[167]1105 935 [153]"LOADTOTAL DEAD: ";DE;"MILLION":HE[178][181](50[172][187](1))[170]50 940 DE[178]DE[172]1000000 945 [153]"HOUSING DESTROYED: ";HE;"%" 950 HE[178]HE[172]137000 955 HE[178]HE[170](NK[172]52000) 960 [153]"TOTAL DAMAGE COST: $";HE 965 DF[178]1:[153]"NUCLEAR WAR HEADS DESTROYED";NK:US1[178]US1[170](DE[170]HE) 970 [153][163]30);"ONONONONONONONDEFCON" 975 [153][163]32);"(null)USR(null)" 980 [153][163]32);"SGN5+ 985 PRINTTAB(32);"[207][183][208] 990 [153][163]32);"SGN4+ 995 PRINTTAB(32);"[207][183][208] 1000 [153][163]32);"SGN3+ 1005 PRINTTAB(32);"[207][183][208] 1010 [153][163]32);"SGN2+ 1015 PRINTTAB(32);"[150][207][183][208] 1020 [153][163]32);"SGN1DEF+ 1025 PRINTTAB(32);"[204][175][186] 1030 SAY"HERE IS THE STA TISTICKS." 1035 [153]"ONONONONU.S. COUNTER ATTACK HAS BEGUN" 1040 SAY"U S COUNTER ATTACK HAS BEGUN." 1045 [139]SD[178]2[167]1060 1050 [153]"10 SECONDS TO VISIBILITY" 1055 SAY"TEN SECONDS TO VISEBILITY." 1060 [153]" HIT ANY KEY TO CONTINUE":SAY"HIT ANY KEY.":[139]SD[178]2[167]1085 1065 [139]SD[179][177]0[167][161]EQ$:[139]EQ$[178]""[167]1065 1070 [139]SD[179][177]0[167]:SAY"T MI NUS TEN SECONDS.":[129]IM[178]10[164]0[169][171]1:[129]MI[178]1[164]500:[130]MI 1075 [139]SD[179][177]0[167][153]"LOAD T MINUS "IM;[163]RE);"AND COUNTING" 1080 [139]SD[179][177]0[167][130]IM:[139]IM[178]10[167]RE[178][171]1 1085 P[178]P[170]1:[139]P[178]6[167]1610 1090 [139]SD[179][177]2[167]1210 1095 [161]EQ$:[139]EQ$[178]""[167]1095 1100 [137]1210 1105 HE[178][181](50[172][187](1))[170]50 1110 DE[178]DE[172]1000000:HE[178]HE[172]137000:HE[178]HE[170](NK[172]52000):US1[178]US1[170](DE[170]HE) 1115 [137]1085 1120 A[178][181](13[172][187](1))[170]1 1125 [145]A[137]680,750,765,780,795,915,825,840,810,855,870,885,900 1130 YU[178]1:WW$[178]"LOADENTER ATTACK LOCATION":[153]WW$:SAYWW$ 1135 [153]"";:[133]" ";W$ 1140 [141]1435:[139]W$[178]"MOSCOW"[167]1235 1145 [139]W$[178]"LENINGRAD"[167]1265 1150 [139]W$[178]"MINSK"[167]1280 1155 [139]W$[178]"KIEV"[167]1295 1160 [139]W$[178]"CENTRAL RUSSIA"[167]1310 1165 [139]W$[178]"TASHKENT"[167]1325 1170 [139]W$[178]"GORKY"[167]1355 1175 [139]W$[178]"OMSK"[167]1370 1180 [139]W$[178]"ALMA-ATA"[167]1400 1185 [139]W$[178]"CHELYABINSKI"[167]1385 1190 [139]W$[178]"KHARKOV"[176]W$[178]"KHAR'KOV"[167]1415 1195 [139]W$[178]"SARATOV"[167]1250 1200 [139]W$[178]"DONETSK"[167]1340 1205 WW$[178]"ATTACK LOCATION NOT AVAILABLE":[153]WW$:SAYWW$:[129]SB[178]1[164]1250:[130]:[137]1130 1210 A[178][181](13[172][187](1))[170]1:YU[178]1:SU[178]1 1215 [139]SD[178]2[176]SD[178]3[167]1780 1220 [139]SD[178]2[176]SD[178]3[167]1130 1225 [141]1435 1230 [145]A[137]1235,1250,1265,1280,1295,1310,1325,1340,1355,1370,1385,1400,1415 1235 MC[178]MC[170]1:[139]MC[179][177]1[167]1210 1240 [153]" ATTACK LOCATION MOSCOW":SAY"ATTACK LOCATION MOSCOU." 1245 DO[178]6.3:NK[178]0:Z[178]8:K[178]9:[137]695 1250 SR[178]SR[170]1:[139]SR[179][177]1[167]1210 1255 [153]" ATTACK LOCATION SARATOV":SAY"ATTACK LOCATION SARATOV." 1260 DO[178].9:NK[178]7:Z[178]12:K[178]10:[137]695 1265 LE[178]LE[170]1:[139]LE[179][177]1[167]1210 1270 [153]" ATTACK LOCATION LENINGRAD":SAY"ATTACK LOCATION LENIN GRAD." 1275 DO[178]3:NK[178]8:K[178]7:Z[178]8:[137]695 1280 MN[178]MN[170]1:[139]MN[179][177]1[167]1210 1285 [153]" ATTACK LOCATION MINSK":SAY"ATTACK LOCATION MINSK." 1290 DO[178]1.1:NK[178]4:Z[178]7:K[178]8:[137]695 1295 KV[178]KV[170]1:[139]KV[179][177]1[167]1210 1300 [153]" ATTACK LOCATION KIEV":SAY"ATTACK LOCATION KE EV." 1305 DO[178]1.1:NK[178]4:Z[178]7:K[178]8:[137]695 1310 MR[178]MR[170]1:[139]MR[179][177]1[167]1210 1315 [153]" ATTACK LOCATION CENTRAL RUSSIA":SAY"ATTACK LOCATION CENTRAL RUSHA." 1320 DO[178].3:NK[178]42:Z[178]24:K[178]7:[137]695 1325 TS[178]TS[170]1:[139]TS[179][177]1[167]1210 1330 [153]" ATTACK LOCATION TASHKENT":SAY"ATTACK LOCATION TASHKENT." 1335 DO[178]1.5:NK[178]5:Z[178]11:K[178]11:[137]695 1340 DS[178]DS[170]1:[139]DS[179][177]1[167]1210 1345 [153]" ATTACK LOCATION DONETSK":SAY"ATTACK LOCATION DONETSK." 1350 DO[178]1.1:NK[178]23:Z[178]12:K[178]11:[137]695 1355 GR[178]GR[170]1:[139]GR[179][177]1[167]1210 1360 [153]" ATTACK LOCATION GORKY":SAY"ATTACK LOCATION GORKY." 1365 DO[178]1.3:NK[178]2:Z[178]10:K[178]9:[137]695 1370 OM[178]OM[170]1:[139]OM[179][177]1[167]1210 1375 [153]" ATTACK LOCATION OMSK":SAY"ATTACK LOCATION OMSK." 1380 DO[178]1.3:NK[178]22:Z[178]16:K[178]8:[137]695 1385 CH[178]CH[170]1:[139]CH[179][177]1[167]1210 1390 [153]" ATTACK LOCATION CHELYABINSKI":SAY"ATTACK LOCATION CHELABINSKY." 1395 DO[178]1:NK[178]10:Z[178]13:K[178]9:[137]695 1400 AA[178]AA[170]1:[139]AA[179][177]1[167]1210 1405 [153]" ATTACK LOCATION ALMA-ATA":SAY"ATTACK LOCATION AELMA.AETTA." 1410 DO[178].9:NK[178]16:Z[178]12:K[178]11:[137]695 1415 KK[178]KK[170]1:[139]KK[179][177]1[167]1210 1420 [153]" ATTACK LOCATION KHAR'KOV":SAY"ATTACK LOCATION KAR KOV." 1425 DO[178]1.5:NK[178]0:Z[178]8:K[178]10:[137]695 1430 [128] 1435 [153]"LOADDEF 1440 PRINT" [206][205] 1445 [153]" (null)TAB(TAB(TAB(TAB(TAB(TAB(TAB((null)TO(null)TAB(TAB(TAB( (null) 1450 PRINT" [206] [205] 1455 [153]" (null) (null) 1460 PRINT" [206][163][205][206] [206] 1465 [153]" (null) (null) 1470 PRINT" [206] [206] 1475 [153]" (null) (null) 1480 PRINT" [205] [164][164][164][164][164][206][163][163][205] [165] 1485 [153]" (null) TOTOTOTOTO(null) (null) FN 1490 PRINT" [205][206] [205] [165] 1495 [153]" (null)FN 1500 PRINT" 1505 [139]YU[178]1[167]YU[178]0:[142] 1510 [139]SD[178]0[167]1590 1515 [153]"LOADTOTAL DEAD: ";DO;"MILLION":HO[178][181](50[172][187](1))[170]50 1520 DO[178]DO[172]1000000 1525 [153]"HOUSING DESTROYED: ";HO;"%" 1530 HO[178]HO[172]137000 1535 HO[178]HO[170](NK[172]52000) 1540 [153]"TOTAL DAMAGE COST: $";HO 1545 [153]"NUCLEAR WAR HEADS DESTROYED";NK 1550 HX1[178]HX1[170](DO[170]HO):P[178]P[170]1:HO[178]0:DO[178]0 1555 SAY"HERE ARE THE STA TISTICS." 1560 [139]P[178]8[167]1580 1565 [153]" HIT ANY KEY TO CONTINUE ":SU[178]0:SAY"HIT ANY KEY." 1570 [139]SD[179][177]0[167][161]ER$:[139]ER$[178]""[167]1570 1575 [137]500 1580 [139]SD[179][177]0[167][161]ER$:[139]ER$[178]""[167]1580 1585 [137]1610 1590 HO[178][181](50[172][187](1))[170]50 1595 DO[178]DO[172]1000000:HO[178]HO[172]137000:HO[178]HO[170](NK[172]52000):HX1[178]HX1[170](DO[170]HO):P[178]P[170]1:HO[178]0 1600 DO[178]0:SU[178]0:YU[178]1:[139]P[178]8[167]1580 1605 [137]1570 1610 TL[178]0:[139]US1[177]HX1[167]1645 1615 [153]"LOAD":A$[178]" THE U.S.S.R. ATTACK HAS BEEN STOPPED":[141]1725:[153]"CMD " 1620 TL[178]3:A$[178]" THE FINAL SCORES ARE:":[141]1725:[153]"CMD " 1625 TL[178]7:[153]"CONT":A$[178]"UNITED STATES:":[141]1725:[153]"CMD ";HX1 1630 TL[178]9:[153]"DEF":A$[178]"RUSSIA: ":[141]1725:[153]"CMD ";US1 1635 TL[178]18:[153]"":A$[178]" WINNER: UNITED STATES":[141]1725:[153]"CMD " 1640 [137]1675 1645 TL[178]0:[153]"LOAD":A$[178]" THE U.S.S.R. ATTACK IS SUCCESSFUL":[141]1725:[153]"CMD " 1650 TL[178]2:A$[178]" THE U.S. HAS BEEN CONQUERED":[141]1725:[153]"CMD " 1655 TL[178]5:A$[178]" THE FINAL SCORES ARE:":[141]1725:[153]"CMD " 1660 TL[178]8:[153]"CONT":A$[178]"UNITED STATES:":[141]1725:[153]"CMD ";HX1 1665 TL[178]10:[153]"DEF":A$[178]"RUSSIA: ":[141]1725:[153]"CMD ";US1 1670 TL[178]18:[153]"":A$[178]" WINNER: U.S.S.R.":[141]1725:[153]"CMD " 1675 [129]K[178]1[164]3000:[130]:[153]"LOAD" 1680 TL[178]0:A$[178]" WANT TO PLAY NUCLEAR WAR AGAIN?":[141]1725:[153]"CMD " 1685 [161]Y$:[139]Y$[178]""[167]1685 1690 [139]Y$[178]"Y"[167][156]:[140]:[129]YT[178]1[164]3:[135]PA$:[130]:[137]495 1695 TL[178]3:A$[178]" WANT TO RETURN TO THE MENU?":[141]1725 1700 [161]Y$:[139]Y$[178]""[167]1700 1705 [139]Y$[179][177]"N"[167]350 1710 TL[178]7:A$[178]" GOOD-BY PROFESSOR!!!":[141]1725 1715 [153]"LOAD BYE BYE":SAY"BYE BYE.":[128] 1720 [135]A$ 1725 A[178][195](A$):[153] 1730 [129]B[178]1[164]A:[153]"":[129]SE[178]1[164]TL:[153]:[130]SE:[153]"";:[139]TL[178]0[167][153]"ONON" 1735 [139][200](A$,1)[178]"H"[175]TL[178]5[167][151]29,0:[153]"CMDCMD" 1740 [151]29,0 1745 [153][163]B);[202](A$,B,1);" WAIT"; 1750 [129]C[178]1[164]SP:[130] 1755 [130]B 1760 SAYA$ 1765 [142] 1770 [137]1675 1775 [151]29,0 1780 [137]1970 1785 [151]56322,0 1790 JV[178][194](56320) 1795 FR[178]JV[175]16 1800 JV[178]15[171](JV[175]15) 1805 [151]56322,255 1810 [142] 1815 [141]1785 1820 [139]JV[179][177]2[167]1815 1825 [141]1785 1830 [139]JV[179][177]1[167]1825 1835 [153]"DEF (null)" 1840 [153]" ENABLED":SAY"ENAEBLED" 1845 [141]1785 1850 [139]JV[179][177]2[167]1845 1855 [141]1785 1860 [139]JV[179][177]1[167]1855 1865 [153]"DEF";[163]12);"(null)" 1870 [153][163]9);"ENABLED":SAY"ENAEBLED" 1875 [141]1785 1880 [139]JV[179][177]2[167]1875 1885 [141]1785 1890 [139]JV[179][177]1[167]1885 1895 [153]"DEF";[163]20);"(null)" 1900 [153][163]17);"ENABLED":SAY"ENAEBLED" 1905 [141]1785 1910 [139]JV[179][177]2[167]1905 1915 [141]1785 1920 [139]JV[179][177]1[167]1915 1925 [153]"DEF";[163]28);"(null)" 1930 [153][163]25);"ENABLED":SAY"ENAEBLED" 1935 [141]1785 1940 [139]JV[179][177]2[167]1935 1945 [141]1785 1950 [139]JV[179][177]1[167]1945 1955 [153]"DEF";[163]36);"(null)" 1960 [153][163]33);"ENABLED":SAY"ENAEBLED." 1965 [153]"CONT":[137]1220 1970 [153]"LOAD ENABLE MISSLES ":SAY"ENAEBLE MISSLES." 1975 [153]" (null) (null) (null) (null) (null) " 1980 [137]1815 1985 [131]" " 1990 [131]" " 1995 [131]"LOG ON:" 2000 [131]"FIRST","SECOND","THIRD","FORTH" 2005 [153]"LOAD" 2010 [151]792,207:[151]793,2:[151]720,7:[151]739,52:[151]743,169:[151]744,48 2015 [151]749,50:[151]754,13:[151]758,0:[151]53280,0:[151]53281,0:[153]"":[141]20 2020 TL[178]5:[153]"LOADDEF":A$[178]" 1.SOVIET UNION":[141]1725:[153]"CMD " 2025 TL[178]7:[153]"CONT":A$[178]" 2.UNITED STATES":[141]1725:[153]"CMD " 2030 TL[178]9:[153]"":A$[178]" WHICH SIDE DO YOU WANT?":[141]1725:[153]"CMD " 2035 [161]SD$:[139]SD$[178]""[167]2035 2040 SD[178][197](SD$) 2045 [139]SD[177]3[167]2005 2050 [142] 2055 [151]792,207:[151]793,2:[151]720,7:[151]739,13:[151]743,0:[153]"LOAD" 2056 [139][194](49153)[179][177]187[167]2075 2060 [158]38144:[151]52,125:[151]54,125:[151]56,125:[151]53280,0:[151]53281,0 2065 ]RE:]LI 1:]SP 68:]PI 68:]KN 150,150:[151]38114,96 2067 [139][194](49920)[179][177]131[167]145 2070 [158]49312:[151]29,0:[151]53265,27:[151]56576,199:[151]53270,200:[151]53272,21 2072 [151]49920,0:[137]145 2075 [151]53280,6:[151]53281,6 2080 [153]"  LOADING SUB PROGRAMS WAIT" 2085 [147]"SAM",8,1 2090 [153]"LOADLOAD";[199](34);"FALKENS MAZE";[199](34);",8,1":[137]2120 2095 [153]"LOADLOAD";[199](34);"CHECKERS";[199](34);",8,1":[137]2120 2100 [151]25598,0:[151]12287,200:[153]"LOADLOAD";[199](34);"CHESS";[199](34);",8,1":[137]2120 2105 [153]"LOADLOAD";[199](34);"POKER";[199](34);",8,1":[137]2120 2110 [153]"LOADLOAD";[199](34);"BIO WAREFARE";[199](34);",8,1":[137]2120 2115 [153]"LOADLOAD";[199](34);"GUERILLA WARFARE";[199](34);",8,1":[137]2120 2120 [151]631,19:[151]632,13:[151]633,82:[151]634,117:[151]635,13:[151]198,5:[151]29,0 2125 [128] 2130 P4$[178]"" 2133 [161]P3$:[139]P3$[178]""[167]2133 2135 [139]P3$[178][199](13)[167][153]"CMD ":[142] 2140 [139]P3$[178][199](20)[167][153]"CMD";[199](20);" WAIT";:P4$[178][200](P4$,[195](P4$)[171]1):[137]2133 2145 P4$[178]P4$[170]P3$ 2150 [153]"CMD ";"CMD";P3$;" WAIT"; 2155 [137]2133